﻿Imports System
Imports System.Data
Imports System.Data.Odbc

'/ <summary>
'/ The SQLDataAccessLayer contains the data access layer for Odbc data provider. 
'/ This class implements the abstract methods in the DataAccessLayerBaseClass class.
'/ </summary>
Public Class OdbcDataAccessLayer
    Inherits DataAccessLayerBaseClass

    ' Provide class constructors
    Public Sub New()
    End Sub

    Public Sub New(ByVal connectionString As String)
        Me.ConnectionString = connectionString
    End Sub

    ' DataAccessLayerBaseClass Members
    Public Overrides Function GetDataProviderConnection() As IDbConnection
        Return New OdbcConnection()
    End Function

    Public Overrides Function GeDataProviderCommand() As IDbCommand
        Return New OdbcCommand()
    End Function


    Public Overrides Function GetDataProviderDataAdapter() As IDbDataAdapter
        Return New OdbcDataAdapter()
    End Function
End Class
